fInt :: Integer -> ()
fInt x = ()